perm filename LOSS.1[NEW,LSP]6 blob sn#615050 filedate 1981-09-25 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(defun test (n)
C00003 ENDMK
CāŠ—;
(defun test (n)
 (do ((i 1 (1+ i)))
     ((< n i) 'ok)
     (purcopy
      (makhunk (expt 2 i)))))